'##############
'Sliding window vent script
'##############

'Sliding window vents for LAZ 4202

'(c) 13.06.2009 Marcel Kuhnt
'(c) 18.06.2011 Morozov Maxim

'Script Version: 1.0
'Omsi release: 1.01

'Needs:
'- heating\heizung
'- cockpit

'==========
'Форточка 1
'==========

{trigger:wv_opn_drag}

	(L.L.wv_pos) (S.L.wv_lastpos)

	(L.S.mouse_x) -500 / (L.L.wv_pos) + (S.L.wv_pos) s0
	l0 0 <
	{if}
		0 (S.L.wv_pos)
		(L.L.wv_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_cls)
		{endif}
		1 (S.L.wv_endanschlag)
		
	{endif}
	l0 1 >
	{if}
		1 (S.L.wv_pos)
		(L.L.wv_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_opn)
		{endif}
		1 (S.L.wv_endanschlag)
	{endif}

	(L.L.wv_pos) s0 0 > l0 1 < &&
	{if}
		0 (S.L.wv_endanschlag)
	{endif}


	(L.L.wv_pos) (L.L.wv_lastpos) - abs (L.S.Timegap) / (S.L.wv_speed)
{end}


{trigger:wv_opn_off}
	0 (S.L.wv_speed)
{end}

'==========
'Форточка 2
'==========

{trigger:wv2_opn_drag}

	(L.L.wv2_pos) (S.L.wv2_lastpos)

	(L.S.mouse_x) -500 / (L.L.wv2_pos) + (S.L.wv2_pos) s1
	l1 0 <
	{if}
		0 (S.L.wv2_pos)
		(L.L.wv2_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_cls)
		{endif}
		1 (S.L.wv2_endanschlag)
		
	{endif}
	l1 1 >
	{if}
		1 (S.L.wv2_pos)
		(L.L.wv2_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_opn)
		{endif}
		1 (S.L.wv2_endanschlag)
	{endif}

	(L.L.wv2_pos) s1 0 > l1 1 < &&
	{if}
		0 (S.L.wv2_endanschlag)
	{endif}


	(L.L.wv2_pos) (L.L.wv2_lastpos) - abs (L.S.Timegap) / (S.L.wv2_speed)
{end}


{trigger:wv2_opn_off}
	0 (S.L.wv2_speed)
{end}

'==========
'Форточка 3
'==========

{trigger:wv3_opn_drag}

	(L.L.wv3_pos) (S.L.wv3_lastpos)

	(L.S.mouse_x) -500 / (L.L.wv3_pos) + (S.L.wv3_pos) s2
	l2 0 <
	{if}
		0 (S.L.wv3_pos)
		(L.L.wv3_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_cls)
		{endif}
		1 (S.L.wv3_endanschlag)
		
	{endif}
	l2 1 >
	{if}
		1 (S.L.wv3_pos)
		(L.L.wv3_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_opn)
		{endif}
		1 (S.L.wv3_endanschlag)
	{endif}

	(L.L.wv3_pos) s2 0 > l2 1 < &&
	{if}
		0 (S.L.wv3_endanschlag)
	{endif}


	(L.L.wv3_pos) (L.L.wv3_lastpos) - abs (L.S.Timegap) / (S.L.wv3_speed)
{end}


{trigger:wv3_opn_off}
	0 (S.L.wv3_speed)
{end}

'==========
'Форточка 4
'==========

{trigger:wv4_opn_drag}

	(L.L.wv4_pos) (S.L.wv4_lastpos)

	(L.S.mouse_x) -500 / (L.L.wv4_pos) + (S.L.wv4_pos) s3
	l3 0 <
	{if}
		0 (S.L.wv4_pos)
		(L.L.wv4_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_cls)
		{endif}
		1 (S.L.wv4_endanschlag)
		
	{endif}
	l3 1 >
	{if}
		1 (S.L.wv4_pos)
		(L.L.wv4_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_opn)
		{endif}
		1 (S.L.wv4_endanschlag)
	{endif}

	(L.L.wv4_pos) s3 0 > l3 1 < &&
	{if}
		0 (S.L.wv4_endanschlag)
	{endif}


	(L.L.wv4_pos) (L.L.wv4_lastpos) - abs (L.S.Timegap) / (S.L.wv4_speed)
{end}


{trigger:wv4_opn_off}
	0 (S.L.wv4_speed)
{end}

'==========
'Форточка 5
'wv5 пропущен, т.к. это имя переменной неработает
'wv5 skipped, cuz this variable name not working
'==========

{trigger:wv6_opn_drag}

	(L.L.wv6_pos) (S.L.wv6_lastpos)

	(L.S.mouse_x) -500 / (L.L.wv6_pos) + (S.L.wv6_pos) s4
	l4 0 <
	{if}
		0 (S.L.wv6_pos)
		(L.L.wv6_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_cls)
		{endif}
		1 (S.L.wv6_endanschlag)
		
	{endif}
	l4 1 >
	{if}
		1 (S.L.wv6_pos)
		(L.L.wv6_endanschlag) !
		{if}
			(T.L.ev_fahrerfenster_opn)
		{endif}
		1 (S.L.wv6_endanschlag)
	{endif}

	(L.L.wv6_pos) s0 0 > l0 1 < &&
	{if}
		0 (S.L.wv6_endanschlag)
	{endif}


	(L.L.wv6_pos) (L.L.wv6_lastpos) - abs (L.S.Timegap) / (S.L.wv6_speed)
{end}


{trigger:wv6_opn_off}
	0 (S.L.wv6_speed)
{end}